#!usr/bin/perl


use LWP::Simple;
use Encode;
$content= get('http://www.boc.cn/sourcedb/whpj/');  

$res = decode("utf-8",$content);
printf($res);